0 PRINT"[147]"
10 A=14336
11 POKE53272,29
20 FORB=0TO30
30 FORI=0TO4
40 FORX=0TO4
50 POKE1024+I*40+X,PEEK(A+I*256+B*5+X)
60 NEXTX
70 NEXTI
80 NEXTB